|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 04.11.2008 um 21:44 Uhr (0)
Hi,Sub Datenübertrag()Dim XlAPP As ObjectSet XlAPP = GetObject(, "Autocad.Application")Range("B3:H8").Select - Werte aus Excel Tabelle Selection.Copy - kopierenShell "C:acad.exe /o M:eichnungsvorlage.dwg" - Zeichnungsvor- lage öffnenDas Programm war nur als Probe gedacht, um festzustellen, wie ich überhaupt von Excel aus eine .dwg öffne. Die Definition von xlAPP hatte bis dahin keinen tieferen Sinn. Auch nicht die Auswah ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 04.11.2008 um 15:06 Uhr (0)
Hallo,Sub Datenübertrag()Dim XlAPP As ObjectSet XlAPP = GetObject(, "Autocad.Application")Range("B3:H8").SelectSelection.CopyShell "C:acad.exe /o M:eichnungsvorlage.dwg"...und dann verließen sie ihn...dieses Modul habe ich in einer Excel-Tabelle begonnen.
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 07.11.2008 um 15:36 Uhr (0)
Hi,ich war wohl ein bisschen voreilig. Wie kopiere ich jetzt eigentlich Excel-Zellen in die Zeichnung. Oder aber wie kann ich auf eine schon in der Zeichnung bestehende Tabelle (AcadTable?) zugreifen bzw. sie aktivieren um hier meine Zellen einzufügen.Danke im vorraus un schönes WEGruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 04.11.2008 um 13:22 Uhr (0)
Hallo,ich habe folgendes Problem:ich möchte gerne Werte aus einer Excel Tabelle in eine CAD-Zeichnung übernehmen (also nur den Text in die jeweilige Zeichnung). Leider kenne ich mich mit den VBA-Befehlen in AutoCad überhaupt nicht aus. Kann mir geholfen werden?Danke im vorrausGruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 04.11.2008 um 14:45 Uhr (0)
Hallo,danke für die schnelle Antwort. Sorry wegen meiner dürftigen InfosAlso:Ich lese bestimmte Dateinamen aus einem Verzeichnis in Excel aus. Diese müssen automatisch bzw. per Button in eine Zeichnungsvorlage(dwg) übertragen werden. Die Zeichnungsvorlage wird dann unter einem neuen Namen bzw. als Kopie in einem variablen Verzeichnis abgespeichert. Die Zeichnung beinhaltet also nur die kopierten Exceldaten (ein bisschen komisch, ich weiß)Ach so ich arbeite hier mit Mechanical Desktop 6 Power Pack.Gruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 05.11.2008 um 07:46 Uhr (0)
Hi,Erstmal Vielen Danke für das Programm.Das Problem es läuft einfach "so durch". Es öffnet mir nicht einmal die Zeichnung...Gruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 06.11.2008 um 15:17 Uhr (0)
Hi,Kommando zurück, es funktioniert. Ich kopiere einfach eine vorgefertigte leere Exceltabelle in die Zeichnung und schon klappts.Also Danke noch mal. Gruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 05.11.2008 um 16:57 Uhr (0)
...bevor ich es vergesse.Leider liegt hier Autocad unter Laufwerk C:Wie dem auch sei könnte es an den Verweisen liegen? Welche Bibliothek wäre hier u.U. die richtige?Gruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 05.11.2008 um 16:50 Uhr (0)
Hi,ich habe On Error Resume Next auskommentiert aber leider geht immer noch nichts.Das Programm läuft aber von A bis Z ohne Beanstandungen durch. Habe auch schon einige Verweise unter Extras versucht, nur eben ohne Erfolg.Gruß
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 06.11.2008 um 15:03 Uhr (0)
Hi,also ich komme so langsam meinem Ziel näher. Zwei Probleme (noch):1. tAcadApp = GetObject(, "AutoCAD.Application") Set tAcadDoc = tAcadApp.Documents.Open ("M:...") == kommen sich in die Quere. Soll heißen, das Programm öffnet die Zeichnung erst, wenn AutoCad schon gestartet ist. Vielleicht müsste ich hier auf meine gute alte Shell-Methode zugreifen2. Mein eigentliches Problem war ja das Einfügen von Zellen in die Zeichnung. Wie sieht hier der Code aus? [Ein Makrorecorder für AutoCad wäre ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 06.11.2008 um 15:05 Uhr (0)
Hi,also ich komme so langsam meinem Ziel näher. Zwei Probleme (noch):1. tAcadApp = GetObject(, "AutoCAD.Application") Set tAcadDoc = tAcadApp.Documents.Open ("M:...") == kommen sich in die Quere. Soll heißen, das Programm öffnet die Zeichnung erst, wenn AutoCad schon gestartet ist. Vielleicht müsste ich hier auf meine gute alte Shell-Methode zugreifen2. Mein eigentliches Problem war ja das Einfügen von Zellen in die Zeichnung. Wie sieht hier der Code aus? [Ein Makrorecorder für AutoCad wäre ...
|
| In das Form AutoCAD VBA wechseln |